home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / clue.lha / clue / obsolete.l < prev    next >
Text File  |  1989-07-12  |  2KB  |  37 lines
  1. ;;; -*- Mode:Lisp; Package:CLUEI; Base:10; Lowercase:T; Syntax:Common-Lisp -*-
  2.  
  3.  
  4. ;;;----------------------------------------------------------------------------------+
  5. ;;;                                                                                  |
  6. ;;;                          TEXAS INSTRUMENTS INCORPORATED                          |
  7. ;;;                                   P.O. BOX 2909                                  |
  8. ;;;                                AUSTIN, TEXAS 78769                               |
  9. ;;;                                                                                  |
  10. ;;;                Copyright (C) 1989 Texas Instruments Incorporated.                |
  11. ;;;                                                                                  |
  12. ;;; Permission is granted to any individual or institution to use, copy, modify, and |
  13. ;;; distribute this software, provided that  this complete copyright and  permission |
  14. ;;; notice is maintained, intact, in all copies and supporting documentation.        |
  15. ;;;                                                                                  |
  16. ;;; Texas Instruments Incorporated provides this software "as is" without express or |
  17. ;;; implied warranty.                                                                |
  18. ;;;                                                                                  |
  19. ;;;----------------------------------------------------------------------------------+
  20.  
  21. (in-package 'cluei :use '(lisp xlib))
  22.  
  23.  
  24. #+explorer
  25. (compiler:make-obsolete defaction "use DEFMETHOD or DEFUN to define an action function")
  26.  
  27. #+explorer
  28. (compiler:make-obsolete call-action "replace with a call to the action function")
  29.  
  30. #+explorer
  31. (compiler:make-obsolete present "set contact-state to :MAPPED instead")
  32.  
  33. #+explorer
  34. (compiler:make-obsolete dismiss "set contact-state to :WITHDRAWN instead")
  35.  
  36.  
  37.